object Form2: TForm2
  Left = 370
  Top = 140
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Shape Properties'
  ClientHeight = 422
  ClientWidth = 258
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 120
  TextHeight = 16
  object Button1: TButton
    Left = 40
    Top = 385
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 136
    Top = 385
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    TabOrder = 1
    OnClick = Button2Click
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 257
    Height = 257
    Caption = 'Preview'
    TabOrder = 2
    object Label1: TLabel
      Left = 16
      Top = 224
      Width = 84
      Height = 16
      Caption = 'Select Shape:'
    end
    object Shape1: TShape
      Left = 24
      Top = 24
      Width = 209
      Height = 169
      Brush.Style = bsClear
    end
    object Panel2: TPanel
      Left = 32
      Top = 32
      Width = 193
      Height = 153
      BevelOuter = bvNone
      Caption = 'Panel2'
      TabOrder = 0
      object PaintBox1: TPaintBox
        Left = 0
        Top = 0
        Width = 193
        Height = 153
        Align = alClient
        OnPaint = PaintBox1Paint
      end
    end
    object ComboBox1: TComboBox
      Left = 104
      Top = 217
      Width = 137
      Height = 24
      Style = csDropDownList
      ItemHeight = 16
      TabOrder = 1
      OnChange = ComboBox1Change
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 264
    Width = 257
    Height = 105
    Caption = 'Common borders'
    TabOrder = 3
    object CheckBox1: TCheckBox
      Left = 132
      Top = 24
      Width = 97
      Height = 17
      Caption = 'Upper'
      TabOrder = 0
      OnClick = CheckBox1Click
    end
    object CheckBox2: TCheckBox
      Left = 132
      Top = 48
      Width = 97
      Height = 17
      Caption = 'Bottom right'
      TabOrder = 1
      OnClick = CheckBox2Click
    end
    object CheckBox3: TCheckBox
      Left = 132
      Top = 72
      Width = 97
      Height = 17
      Caption = 'Bottom left'
      TabOrder = 2
      OnClick = CheckBox3Click
    end
    object Edit1: TEdit
      Left = 40
      Top = 40
      Width = 41
      Height = 24
      ReadOnly = True
      TabOrder = 3
      Text = '27'
    end
    object UpDown1: TUpDown
      Left = 81
      Top = 40
      Width = 19
      Height = 24
      Associate = Edit1
      Min = 0
      Position = 27
      TabOrder = 4
      Wrap = False
      OnClick = UpDown1Click
    end
  end
end